home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD School House 9
/
CD School House 9.0 - Wayzata Technology (1994).iso
/
pc
/
games
/
mac
/
__interesting_stuff__
/
hyperlabels_2.0
/
background_19261.txt
< prev
next >
Wrap
Text File
|
1990-03-22
|
21KB
|
1,069 lines
-- background: 19261 from stack: in.0
-- bmap block id: 25041
-- flags: 0000
-- background id: 0
-- name: icons
----- HyperTalk script -----
on getIcon
global doubleIt
put the rect of the target into pictrect
put item 1 of pictrect into x1
put item 2 of pictrect into y1
put item 3 of pictrect into x2
put item 4 of pictrect into y2
-- get the picture
choose select tool
drag from x1,y1 to x2,y2
drag from x1,y1 to 0,0 with OptionKey
put x2 - x1 into dx
put y2 - y1 into dy
if doubleIt is "true" then
put 2 * dx into ndx
put 2 * dy into ndy
drag from dx,dy to ndx,ndy with CommandKey
end if
doMenu "Cut Picture"
pop card
doMenu "Paste Picture"
drag from 0,0 to 25,160
end getIcon
-- part 1 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=461 top=304 right=340 bottom=509
-- title width / last selected line: 0
-- icon id / first selected line: 29114 / 29114
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
pop card
end mouseUp
-- part 2 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=13 top=53 right=92 bottom=54
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 3 (button)
-- low flags: 00
-- high flags: 8005
-- rect: left=174 top=307 right=329 bottom=308
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Double Icon Size
----- HyperTalk script -----
-- check box that determines if the icon should be doubled
on mouseUp
global doubleIt
if hilite of the target is "true" then
set hilite of the target to "false"
else
set hilite of the target to "true"
end if
put hilite of the target into doubleIt
end mouseUp
-- part 4 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=62 top=53 right=92 bottom=103
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 5 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=111 top=53 right=92 bottom=152
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 6 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=356 top=53 right=92 bottom=397
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 7 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=307 top=53 right=92 bottom=348
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 8 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=258 top=53 right=92 bottom=299
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 9 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=209 top=53 right=92 bottom=250
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 10 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=160 top=53 right=92 bottom=201
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 11 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=452 top=53 right=92 bottom=493
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 12 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=404 top=53 right=92 bottom=445
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 13 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=13 top=101 right=140 bottom=54
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 14 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=62 top=101 right=140 bottom=103
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 15 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=452 top=101 right=140 bottom=493
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 16 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=404 top=101 right=140 bottom=445
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 17 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=356 top=101 right=140 bottom=397
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 18 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=307 top=101 right=140 bottom=348
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 19 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=258 top=101 right=140 bottom=299
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 20 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=209 top=101 right=140 bottom=250
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 21 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=160 top=101 right=140 bottom=201
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 22 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=111 top=101 right=140 bottom=152
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 23 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=13 top=149 right=188 bottom=54
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 24 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=452 top=149 right=188 bottom=493
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 25 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=404 top=149 right=188 bottom=445
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 26 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=356 top=149 right=188 bottom=397
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 27 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=307 top=149 right=188 bottom=348
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 28 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=258 top=149 right=188 bottom=299
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 29 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=209 top=149 right=188 bottom=250
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 30 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=160 top=149 right=188 bottom=201
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 31 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=111 top=149 right=188 bottom=152
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 32 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=62 top=149 right=188 bottom=103
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 33 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=13 top=198 right=237 bottom=54
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 34 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=452 top=198 right=237 bottom=493
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 35 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=404 top=198 right=237 bottom=445
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 36 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=356 top=198 right=237 bottom=397
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 37 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=307 top=198 right=237 bottom=348
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 38 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=258 top=198 right=237 bottom=299
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 39 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=209 top=198 right=237 bottom=250
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 40 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=160 top=198 right=237 bottom=201
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 41 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=111 top=198 right=237 bottom=152
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 42 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=62 top=198 right=237 bottom=103
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 43 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=13 top=248 right=287 bottom=54
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 44 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=452 top=248 right=287 bottom=493
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 45 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=404 top=248 right=287 bottom=445
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 46 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=356 top=248 right=287 bottom=397
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 47 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=307 top=248 right=287 bottom=348
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 48 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=258 top=248 right=287 bottom=299
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 49 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=209 top=248 right=287 bottom=250
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 50 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=160 top=248 right=287 bottom=201
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 51 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=111 top=248 right=287 bottom=152
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 52 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=62 top=248 right=287 bottom=103
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
getIcon -- bckgnd script
end mouseUp
-- part 53 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=46 top=309 right=334 bottom=73
-- title width / last selected line: 0
-- icon id / first selected line: 1013 / 1013
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Next
----- HyperTalk script -----
on mouseUp
visual effect wipe left
go to next card
end mouseUp
-- part 54 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=15 top=309 right=334 bottom=42
-- title width / last selected line: 0
-- icon id / first selected line: 1014 / 1014
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Prev
----- HyperTalk script -----
on mouseUp
visual effect wipe right
go to previous card
end mouseUp